|
Autocad VBA : Abmessungen und Formen von Selectionsets
Dressler am 02.04.2004 um 11:45 Uhr (0)
Hallo Axel, das Problem bei der Sache ist, daß das Objekt aus dem SelectionSet bei mir nicht mit dem GetBoundingBox zusammen funktioniert. Möglichkeit, alle Informationen, die der ausgewählte Bereich enthält, zu bekommen Ist das was ich meine. Also alle Objekte und Geometrien mit der jeweiligen Position und den Abmaßen. ..... Grundsätzlich würde ich mal sagen, dass man bei solchen Aufgabenstellungen mit Lisp wesentlich besser bedient ist. VBA hat seine Stärken, wenn es um Verbindungen zu anderen Applikat ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Abmessungen und Formen von Selectionsets
Dressler am 02.04.2004 um 08:14 Uhr (0)
Hallo und schönen guten morgen an alle miteinander. Vielleicht kann mir jemand bei einem der folgenden Probleme weiter helfen. Beim 1. Wunsch reicht es mir vollkommen , wenn ich die Größe und Koordinaten meiner Auswahl bekommen könnte. Hier dazu mein kleiner 1. Codeversuch: Private Sub CommandButton4_Click() Me.Hide UserForm ausblenden Dim ssetObj As AcadSelectionSet Set ssetObj = ThisDrawing.SelectionSets.Add( TEST_SSET ) Add objects to a selection set by prompting user to select on t ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Abmessungen und Formen von Selectionsets
Dressler am 07.04.2004 um 10:49 Uhr (0)
Hallo und schönen guten Morgen, ich hab den Code von Roland nun mal ausprobiert und den Code von Robert in ein Modul mit dem Namen Bounding reingetan. hier also der Code im Modul Bounding: Public Function ssExtents(SS As AcadSelectionSet) As Variant Dim points(), c, i As Long Dim min, max, util As AcadUtility Dim Extents Set util = ThisDrawing.Utility c = 0 For i = 0 To SS.Count - 1 On Error Resume Next If Err Then Err.Clear Else SS. ...
| | In das Form Autocad VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
